(shell-get-current-command): Make regexp more selective.

diff --git a/lisp/shell.el b/lisp/shell.el
index 05179863d940ad030dcffad5102211b69b824e6b..a759aedc8ea110dab98896796afba844421a3945 100644 (file)
--- a/lisp/shell.el
+++ b/lisp/shell.el
@@ -625,7 +625,7 @@ See `shell-command-regexp'."
 (defun shell-get-current-command ()
   "Function that returns the current command including arguments."
   (save-excursion
-    (if (looking-at "\\s *[^;&|]")
+    (if (looking-at "[\t ]*[^;&|\n]")
        (goto-char (match-end 0)))
     (buffer-substring
      (progn (shell-backward-command 1) (point))